home *** CD-ROM | disk | FTP | other *** search
/ SuperModels in the Rainforest / SuperModels in the Rainforest.iso / rain.dxr / 00087.ls < prev    next >
Encoding:
Text File  |  1995-10-13  |  1.0 KB  |  39 lines
  1. on exitFrame
  2.   global gbRollShoot1, gbRollShoot2, gbRollShoot3
  3.   if rollOver(16) and (gbRollShoot1 <> 1) then
  4.     repeat with i = 12 to 14
  5.       set the visible of sprite i to 1
  6.     end repeat
  7.     set gbRollShoot1 to 1
  8.   else
  9.     if not rollOver(16) and (gbRollShoot1 <> 0) then
  10.       repeat with i = 12 to 14
  11.         set the visible of sprite i to 0
  12.       end repeat
  13.       set gbRollShoot1 to 0
  14.     end if
  15.   end if
  16.   if rollOver(17) and (gbRollShoot2 <> 1) then
  17.     set the visible of sprite 10 to 1
  18.     set gbRollShoot2 to 1
  19.   else
  20.     if not rollOver(17) and (gbRollShoot2 <> 0) then
  21.       set the visible of sprite 10 to 0
  22.       set gbRollShoot2 to 0
  23.     end if
  24.   end if
  25.   if rollOver(18) and (gbRollShoot3 <> 1) then
  26.     repeat with i = 5 to 8
  27.       set the visible of sprite i to 1
  28.     end repeat
  29.     set gbRollShoot3 to 1
  30.   else
  31.     if not rollOver(18) and (gbRollShoot3 <> 0) then
  32.       repeat with i = 5 to 8
  33.         set the visible of sprite i to 0
  34.       end repeat
  35.       set gbRollShoot3 to 0
  36.     end if
  37.   end if
  38. end
  39.